home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / telecom / 86 / modula / linea.def < prev    next >
Encoding:
Modula Definition  |  1986-12-19  |  434 b   |  19 lines
  1. DEFINITION MODULE LINEA ;
  2.  
  3. PROCEDURE LineAttribs(linemask, wrtmode : INTEGER) ;
  4. (* see abacus INTERNALS for details *)
  5.  
  6. PROCEDURE Plot(x, y : INTEGER) ;
  7.  
  8. PROCEDURE Locate(x, y : INTEGER) : INTEGER ;
  9. (* returns color value of point *)
  10.  
  11. PROCEDURE LineColour(p1, p2, p3, p4 : INTEGER) ;
  12. (* sets line color of the planes *) 
  13.  
  14. PROCEDURE PlotColour(color : INTEGER) ;
  15.  
  16. PROCEDURE Line(x, y, x1, y1 : INTEGER) ;
  17.  
  18. END LINEA.
  19.